home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The X-Philes (2nd Revision)
/
The X-Philes Number 1 (1995).iso
/
xphiles
/
hp48hor2
/
simplex3
< prev
next >
Wrap
Text File
|
1995-03-31
|
6KB
|
2 lines
HPHP48-E *δ░¬+ P è) 7 3) 004E5@ H.@ f & ä binvH.@àf & ä dataH.@ 7'7 ä acstH.@0ö6G∙ } @ ÷v7G0 ! @0öÆ6G0 ! @ &G F0 ! @@ F F█ é 0 P / rsrc è) 3) z @0ö6GG█ 0
bvar t* ,*ó¢r4*b¢â5*+1δ acst è) 3) █ ª @àf &G@ £ò1*2£² % @ æfG█ (c) 0 P gfffff 433333 333333y P 333333 433333 gfffffp P gfffff 433333 gfffff 333333 433333 333333p P 333333 433333 333333y P CLR14 -δb {@δm +1p ZERO 3) P MSPL - « Dù 1█z5ò:à a - c+1à "6" "V∙ ¼ Öù ) P :8 0Mó p~a E Dtà@a æ< !r█[5#2@3 F)f;a >à â>δb ¬ c'¢"D â2à< 2à a 7öf54s°ù` v>a &ì ï=`;ao>p? !r█[5#2`;a¥s@$ ç æà ù?à â>δb ¬ c'¢"D â2à< 2à a 7öf54s°ù` v>a &ì öb ÷s " █c!rp? !r█[5#2@3 V: D2p>a >`;a >à â>δb ¬ c'¢"D â2à< 2à a 7öf54s°ù` t° +1 ) MBASE - « ² Dù 1█z5*qDù ) P :8 0M3 p~a E Dt@+*ç 7^YT0" = ï?àú`!r0" ç = â2`;a¼=0ó`,U ï a - ,*á a -°û`|<█a!rDù ï?δ d+1à a+1Dù » VSb ö d+1° D2@3 V) ô" a -P) !rδû ¬ à #2° D2@3 D2pI +1° @DTÄôDDù Ñù ) - î #2█ b5 ëb11F+*B4 ÿ #2à aûs , Æû ï=0ó`É¢2" oVC3 V) Æú`: [5 |#aûs " ,U bâ2 (a¼=0ó`» *a!ràô φ Öù ^ æ * (c)² ─ª2" oVS) 4s0" ú &÷`+1° G @D4%4DDù Ñù )P -δJ H>Öù )0 :8 }b ->P2 1█z5*qDù ) P :8 » V c11F+*B4 , ûs " #2° ai!| - c+1 î f"&, 6φ u;à a - c+1° a = â2 (a¼=0ó`,UC a &, Æû 3 & a#2δf5 F3 Ä+frb4s@ a~ +1à MJOC -D D Dù 1█z5ò:à a - c+1à!a W#─ ¼ Öù ) P :8 ù? ÿ 0M3 p~a E Dt█Cal æô ¼ Öù ) P :8 #2àFaûs`;a Ærc 1àú`à v? !r█[5¬ F3 #2p>a\ Ærc 1àú`δ v? !r█[5¬ F3 #2@3 X2àFa\ æ@a¼=à â>δb ¬ c'¢"D â2 ÿ ÷sP) b ycoVC3 vI +1° φ PDdöTEUDù Ñù )@ -0" ròb b5à ab5° b*qDù ) P :8 ûs " ,U a -P) !r█[5 2à * 1à%aq a -@ a % !ràú`+1@$ #2° D2@3 X2°ù`¿ ± +1à MVIN - « Dù 1 V r bûs " ,U '¢ *φ Öù 1 #aq a - bX2 " 2° D2° D2@3 &'öû +1° ê PD4 ô UDù ² Ñù )@ -@'7H.@ U$ö4" 1 V ï= ÿ ÷s " ,U *b *¼ Öù '¢ " oV3 4s°ù`+1° (c) 0 $3Dù 6 ä nvar{ïA +1 ,* ü1 #~A. â H.@0öÆ6xÅ ú.òù ½û ½ +1Pû"g«Q'y"L22ì" û H.@àf & ½û D H.@ &G & ú.òù T6 ä nvary6òì '¢Be#H.@ &G g#í ä costT6 ä acsty6òì +1Pû"φûQ'y"96² c 0 3Dù 6B+*T6 ä artiy6òì t*° H.@ f &7 # ûA+*'êq, ]0òù ü â g«áà ü ä colsT6 ä artiy6B g«q@ +1@i#φû1ì"H.@ &G |ï" -@e#H.@ f & g#í ä rowsÜòÑ» H.@D4%4 ä data½û ä MJOCT6 ä datay6òì É¢ ä colsH.@ &G v b¢2x '¢b H.@0öÆ6 ,*g« ä colsH.@ &G v 1òæ im. ,* ôá$#+1Pû" -█½ φû ä cost+1P'y"T6 ä acsty6òì 96² o `δTEe $eDù 6 ä nvar½ûa| É¢2x H.@@ F Ö» H.@D4%4 ä binv½ûáb H.PD4 ô ä binvH.@ 7'7æb H.PD4 ô ä MVOUT96² ù P äd $UDù 6 ä acstH.@ f & ä MSBCH.@ æfçb H.@@ F ä nvarH.@D4%4äb H.@ 66G ä nvarH.@D4%4 D (c) ä MCHOPH.@Dd ä c#+1à ITER -àa#á4òæ inm.0δVGça#H.@ æf ä dataT6 ä nvary6òæ inÆx ,* Ç ä MSBCîÑæ outH.@DTÄôDe#H.@ æf g#S Be#H.@àf & g#m. æf| T6 ä bvary6òæ outÆxAe#H.@àf & g#m. ææà ôAe#H.@ f & g#m.0δVGçà ôá_#96² P0öÄdUTDù 6 a á4òæ flags 62 Öâ1 #H.P0Ä$ C~A¢ DW& F öæ| ,* ¥ ä INVAR~A.r, '¢ò(c) ú.òù û ä OUTVAR~A.r, '¢ò(c) ú.òù á4òæ inm.0δVGça#,*° Iteration: T6 ä nvary6òæ inÆx±° g«á¢ ò r T6 ä bvary6òæ outÆx±° g« ,* ¥Ñæ inm.0δVG ä ITERb5² µ/òù φû ½ ,*P Unbound SolutionÉ¢BX É¢BZ 3) @' +1P'y"+1Pû" -█½ ~A. ä artiú.òù ,*° Initialized Phase 2É¢BX H.0 $3ì"H.@ &G |ï" -ࢠ/ %÷&ÆVÖ 6 RåfV 6 &ÆV ,* ¥± Ö/² µ/òù ,* Solution FoundÉ¢BX H.@0öÄT ,*¥1 tâ± Ö/² Ö/ò #3) 01 16òæ flags░Æá_#96² P@% 4TTDù 6 ä CLR14,*° Iteration: É¢BX H.P äd $5ì" ûA+* ê¡ï" -p, H.`δTEe $5ì" ûA+* ê¡ï" - L#m. æÖæ out 6⢠DW& F öæ| Be#H.@àf & g#m. æf| ëq ,*° g«Ae#H.@ f & g#m.0δVGg| ëq É¢BX m. æÖæ outH.@ DU$å_#+1Pû" -█½ φûᢠ% På&öVçF 2öÆVG öæ ,* ¥ ä SRAY+1P'y"+1Pû" -█½ ~A. ä artiú.òù H.0 $3ì"H.@ &G |ï" -ࢠ/ %÷&ÆVÖ 6 RåfV 6 &ÆV ,* ¥± µ/òù ,*° Initialized Phase 2É¢BX +1P'y"+1Pû" -ࢠ! 0öÆVG öæ bôVçF ,* ¥ ä SOLU+1P'y"+1P'y"É¢BZ 96² w @0% EDù 6 ä binvH.@@ F æb H.@àf & ä INVARÆx ,* Ç ä MSBC (c) ä colsH.@ &G v É¢2x '¢b É¢ ä bvar,É #m. â m. f| T6 ä bvary6òæ iÆxÑ» ôá$#½û ½ 96² 7 @0öÄTEDù 6 ä binvH.@ 7'7æb H.@0öÆ6 ä artig« ,* ÇA+* Ñ ,*H.@ f & 1òæ i)üÑæ iÆxAe#H.@ f & g#m. f| ½ûq@ L2⢠█å["½û ä acstH.@ f & ä MSBC û ä binvîA H.@ ÷v7∙ ßDᢠ`é["½ûáà î±÷ φûᢠå["96² @@ $ÄDDù 6 ä data,ɱ÷ φû L#m. xæ c 6B É¢òæ c+1@+* Ñ ä acstH.@ f & ä MSBCH.@ æfçb É¢òæ c 1òæ i û ä datam. ,* Ç ä MSBCî±÷ φû1ì"m. ä colsH.@ &G v üì¡ï" -█ä acstm. f| +1Pû"'¢R'y" áà m. æà ôÑ» L2 ä rsrcîQ H.@Dô4T ó ä binvH.@@ F æb H.@ æf ä rsrcî ä MJOC ó ä MJOC ó ä MCHOPb5 c#+1à& INIT -àa# û {ï ½ á4òæ dm. DÖæ n 6 ä CLR14,*0 SimplexÉ¢BX m. D ,* Ae#H.@ ÷v7 g#í òæ nÉ¢ D T6 ä colsy6òì m. @ ä MSPLT6 ä datay6òì T6 ä rsrcy6òì T6 ä costy6òì H.@@ F ä MBASET6 ä bvary6òì H.0 3ì"H.@ &G |ï",*° Initialized Phase 1µ/⢠`ôVçF " 6WV'y"É¢BX t*° É¢ ä cols 1òæ i~A. ä bvarm. F« è¡ï" -Dæ ig«± Ö/â$#T6 ä nvary6òì H.@@ F ä bvarH.@D4%4De#H.@ æf g#í ,*¥á_#96²